home *** CD-ROM | disk | FTP | other *** search
/ PC World 2006 July & August / PCWorld_2006-07-08_cd.bin / v cisle / acehtml / acehtmlfreeware.exe / scriptdef / Select A Month.sd < prev    next >
INI File  |  2004-06-28  |  5KB  |  184 lines
  1. [SUBJECT]
  2. Description=Builds calendar for a month
  3. ImageIndex=-1
  4. Folder=Tools
  5.  
  6.  
  7. [HEAD_TEXT]
  8. ;<script language="JavaScript">
  9. ;<!-- Begin
  10. ; var now,day,month,year;
  11. ;function setToday() {
  12. ;now   = new Date();
  13. ;day   = now.getDate();
  14. ;month = now.getMonth();
  15. ;year  = now.getYear();
  16. ;if (year < 2000)    // Y2K Fix, Isaac Powell
  17. ;year = year + 1900; // http://onyx.idbsu.edu/~ipowell
  18. ;this.focusDay = day;
  19. ;document.calControl.month.selectedIndex = month;
  20. ;document.calControl.year.value = year;
  21. ;displayCalendar(month, year);
  22. ;}
  23. ;function isFourDigitYear(year) {
  24. ;if (year.length != 4) {
  25. ;alert ("Sorry, the year must be four-digits in length.");
  26. ;document.calControl.year.select();
  27. ;document.calControl.year.focus();
  28. ;} else { return true; }
  29. ;}
  30. ;function selectDate() {
  31. ;year  = document.calControl.year.value;
  32. ;if (isFourDigitYear(year)) {
  33. ;day = 0;
  34. ;month = document.calControl.month.selectedIndex;
  35. ;displayCalendar(month, year);
  36. ;    }
  37. ;}
  38. ;
  39. ;function setPreviousYear() {
  40. ;year  = document.calControl.year.value;
  41. ;if (isFourDigitYear(year)) {
  42. ;day   = 0;
  43. ;month = document.calControl.month.selectedIndex;
  44. ;year--;
  45. ;document.calControl.year.value = year;
  46. ;displayCalendar(month, year);
  47. ;   }
  48. ;}
  49. ;function setPreviousMonth() {
  50. ;year  = document.calControl.year.value;
  51. ;if (isFourDigitYear(year)) {
  52. ;day   = 0;
  53. ;month = document.calControl.month.selectedIndex;
  54. ;if (month == 0) {
  55. ;month = 11;
  56. ;if (year > 1000) {
  57. ;year--;
  58. ;document.calControl.year.value = year;
  59. ;}
  60. ;} else { month--; }
  61. ;document.calControl.month.selectedIndex = month;
  62. ;displayCalendar(month, year);
  63. ;   }
  64. ;}
  65. ;function setNextMonth() {
  66. ;year  = document.calControl.year.value;
  67. ;if (isFourDigitYear(year)) {
  68. ;day   = 0;
  69. ;month = document.calControl.month.selectedIndex;
  70. ;if (month == 11) {
  71. ;month = 0;
  72. ;year++;
  73. ;document.calControl.year.value = year;
  74. ;} else { month++; }
  75. ;document.calControl.month.selectedIndex = month;
  76. ;displayCalendar(month, year);
  77. ;   }
  78. ;}
  79. ;function setNextYear() {
  80. ;year = document.calControl.year.value;
  81. ;if (isFourDigitYear(year)) {
  82. ;day = 0;
  83. ;month = document.calControl.month.selectedIndex;
  84. ;year++;
  85. ;document.calControl.year.value = year;
  86. ;displayCalendar(month, year);
  87. ;   }
  88. ;}
  89. ;function displayCalendar(month, year) {
  90. ;month = parseInt(month);
  91. ;year = parseInt(year);
  92. ;var i = 0;
  93. ;days = getDaysInMonth(month+1,year);
  94. ;var firstOfMonth = new Date (year, month, 1);
  95. ;var startingPos = firstOfMonth.getDay();
  96. ;days += startingPos;
  97. ;document.calControl.calPage.value  =   " Su Mo Tu We Th Fr Sa";
  98. ;document.calControl.calPage.value += "\n --------------------";
  99. ;for (i = 0; i < startingPos; i++) {
  100. ;if ( i%7 == 0 ) document.calControl.calPage.value += "\n ";
  101. ;document.calControl.calPage.value += "   ";
  102. ;}
  103. ;for (i = startingPos; i < days; i++) {
  104. ;if ( i%7 == 0 ) document.calControl.calPage.value += "\n ";
  105. ;if (i-startingPos+1 < 10)
  106. ;document.calControl.calPage.value += "0";
  107. ;document.calControl.calPage.value += i-startingPos+1;
  108. ;document.calControl.calPage.value += " ";
  109. ;}
  110. ;for (i=days; i<42; i++)  {
  111. ;if ( i%7 == 0 ) document.calControl.calPage.value += "\n ";
  112. ;document.calControl.calPage.value += "   ";
  113. ;}
  114. ;document.calControl.Go.focus();
  115. ;}
  116. ;function getDaysInMonth(month,year)  {
  117. ;var days;
  118. ;if (month==1 || month==3 || month==5 || month==7 || month==8 || month==10 || month==12)  days=31;
  119. ;else if (month==4 || month==6 || month==9 || month==11) days=30;
  120. ;else if (month==2)  {
  121. ;if (isLeapYear(year)) { days=29; }
  122. ;else { days=28; }
  123. ;}
  124. ;return (days);
  125. ;}
  126. ;function isLeapYear (Year) {
  127. ;if (((Year % 4)==0) && ((Year % 100)!=0) || ((Year % 400)==0)) {
  128. ;return (true);
  129. ;} else { return (false); }
  130. ;}
  131. ;// End -->
  132. ;</SCRIPT>
  133.  
  134.  
  135. [BODY_TAG]
  136. ;onLoad="setToday()"
  137.  
  138. [BODY_TEXT]
  139. ;
  140. ;<div align="center">
  141. ;<h2>`Caption`</h2>
  142. ;<form name="calControl" onSubmit="return false;">
  143. ;<table cellpadding="0" cellspacing="0" border="0" summary="">
  144. ;<tr><td colspan="7">
  145. ;<select name="month" onChange="selectDate()">
  146. ;<option>January
  147. ;<option>February
  148. ;<option>March
  149. ;<option>April
  150. ;<option>May
  151. ;<option>June
  152. ;<option>July
  153. ;
  154. ;<option>August
  155. ;<option>September
  156. ;<option>October
  157. ;<option>November
  158. ;<option>December
  159. ;</select>
  160. ;<input name="year" type="text" size="4" maxlength="4">
  161. ;<input type="button" name="Go" value="Build!" onClick="selectDate()">
  162. ;
  163. ;</td>
  164. ;</tr>
  165. ;<tr><td align="center"><textarea font="Courier" name="calPage" wrap="no" rows="8" cols="22"></textarea>
  166. </td><tr><td><div align="center">
  167. ;</TD></TR><TR><TD>
  168. ;<input type="button" name="previousYear" VALUE=" <<  "    onClick="setPreviousYear()">
  169. ;<input type="button" name="previousYear" VALUE="  <  "    onClick="setPreviousMonth()">
  170. ;<input type="button" name="previousYear" VALUE="Today"    onClick="setToday()">
  171. ;<input type="button" name="previousYear" VALUE="  >  "    onClick="setNextMonth()">
  172. ;<input type="button" name="previousYear" VALUE="  >> "    onClick="setNextYear()">
  173. ;</td></tr>
  174. ;</table></form>
  175. ;</div>
  176. ;
  177.  
  178.  
  179. [`Caption`]
  180. Kind=S
  181. Value=Select-A-Month
  182.  
  183.  
  184.